The following code is an example of how to use the PEOutputToWindow function:
LOCAL result, cTitle, nError
cReport = "My Report"
result = PEOutputToWindow(Job, cTitle, CW_USEDEFAULT,;
CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, 0, 0)
IF result = .F.
nError = PEGetErrorCode(Job)
&& Handle error
PEClosePrintJob(Job)
return
ENDIF
Seagate Software IMG Holdings, Inc. http://www.seagatesoftware.com Support services: http://support.seagatesoftware.com |